home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / asm / snma-1.97.lha / SNMA / arexx / seegb.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1994-12-12  |  371 b   |  23 lines
  1. /*
  2.     seegb.rexx
  3.     Display all global include files
  4. */
  5.  
  6. if arg() ~= 0 THEN  DO
  7.     say 'Usage: rx seegb.rexx'
  8.     exit    5
  9.     end
  10. arg cmd
  11. address SNMA
  12. seegb stem inc
  13. if inc.count > 0 then do
  14.     say 'SNMA has the following ('inc.count') include files in global table:'
  15.     do i=0 to inc.count-1
  16.     say inc.i
  17.     end
  18.     end
  19. else    say 'SNMA has no global includes.'
  20. exit
  21.  
  22.  
  23.